00100	EXTERNAL PROCEDURE RVECT(REAL X,Y);
00200	EXTERNAL PROCEDURE RIVECT(REAL X,Y);
00300	EXTERNAL PROCEDURE RPT(REAL X,Y);
00400	EXTERNAL PROCEDURE RPOINT(REAL X,Y);
00500	EXTERNAL PROCEDURE AIVECT(REAL X,Y);
00600	EXTERNAL PROCEDURE AVECT(REAL X,Y);
00700	EXTERNAL PROCEDURE APT(REAL X,Y);
00800	EXTERNAL PROCEDURE APOINT(REAL X,Y);
00900	EXTERNAL PROCEDURE GVECT(REAL X,Y;INTEGER OP,SIZ,BRT);
01000	EXTERNAL PROCEDURE DPYSET(INTEGER ARRAY BUF);
01100	EXTERNAL INTEGER PROCEDURE DPYPARS;
01200	EXTERNAL PROCEDURE DPYRESET(INTEGER ARRAY BUF);
01300	EXTERNAL INTEGER PROCEDURE GETPOG;
01400	EXTERNAL PROCEDURE RELPOG(INTEGER POG);
01500	EXTERNAL PROCEDURE CLRBFR;
01600	EXTERNAL PROCEDURE HYDPOG(INTEGER POG);
01700	EXTERNAL PROCEDURE DPYOUT(INTEGER POG);
01800	EXTERNAL BOOLEAN OVERLAY;
01900	EXTERNAL PROCEDURE TYPLOC(INTEGER P1,P2);
02000	EXTERNAL PROCEDURE DPYTYP(INTEGER POS,JMPS,LINESPERJUMP);
02100	EXTERNAL PROCEDURE PGSEL(INTEGER POG);
02200	EXTERNAL PROCEDURE UPGMVM(INTEGER VAL;INTEGER ADR);
02300	EXTERNAL INTEGER PROCEDURE UPGMVE(INTEGER ADR);
02400	EXTERNAL PROCEDURE DPYCLR;
02500	EXTERNAL INTEGER PROCEDURE DPYTST;
02600	EXTERNAL PROCEDURE DPYBIG(INTEGER SIZE);
02700	EXTERNAL PROCEDURE DPYBRT(INTEGER BRT);
02800	EXTERNAL PROCEDURE DPYSST(STRING S);
02900	EXTERNAL INTEGER DPYPTR;
03000	
03100	EXTERNAL PROCEDURE ACPOGS(INTEGER MASK);
03200	EXTERNAL PROCEDURE ACCPOG(INTEGER POG);
03300	EXTERNAL PROCEDURE DACPOG(INTEGER POG);
03400	EXTERNAL INTEGER POGON;
03500	
03600	EXTERNAL PROCEDURE DDOPT;
03700	EXTERNAL PROCEDURE NODDOPT;
03800	EXTERNAL PROCEDURE WINDOW(REAL XMIN,XMAX,YMAX,YMIN);